﻿
Partial Class Odontograma
    Inherits System.Web.UI.UserControl

    Public Enum Cor
        blue
        red
        yellow
        white
    End Enum
    Public Property CorEscolhida As Cor
        Set(value As Cor)
            ddlcor.SelectedValue = value.ToString
        End Set
        Get
            If ddlcor.SelectedValue = "blue" Then
                Return Cor.blue
            ElseIf ddlcor.SelectedValue = "red" Then
                Return Cor.red
            ElseIf ddlcor.SelectedValue = "yellow" Then
                Return Cor.yellow
            Else
                Return Cor.white
            End If
        End Get
    End Property
    Public Property DenteEscolhido As Int32
        Set(value As Int32)
            hnddente.Value = value
        End Set
        Get
            Return hnddente.Value
        End Get
    End Property
    Public Sub InicializaDente18(cor1 As Cor, cor2 As Cor, cor3 As Cor, cor4 As Cor, cor5 As Cor)
        Dente18.Posicao01_Cor = cor1
        Dente18.Posicao02_Cor = cor2
        Dente18.Posicao03_Cor = cor3
        Dente18.Posicao04_Cor = cor4
        Dente18.Posicao05_Cor = cor5
    End Sub
    Public Sub InicializaDente17(cor1 As Cor, cor2 As Cor, cor3 As Cor, cor4 As Cor, cor5 As Cor)
        Dente17.Posicao01_Cor = cor1
        Dente17.Posicao02_Cor = cor2
        Dente17.Posicao03_Cor = cor3
        Dente17.Posicao04_Cor = cor4
        Dente17.Posicao05_Cor = cor5
    End Sub
    Public Sub InicializaDente16(cor1 As Cor, cor2 As Cor, cor3 As Cor, cor4 As Cor, cor5 As Cor)
        Dente16.Posicao01_Cor = cor1
        Dente16.Posicao02_Cor = cor2
        Dente16.Posicao03_Cor = cor3
        Dente16.Posicao04_Cor = cor4
        Dente16.Posicao05_Cor = cor5
    End Sub
    Public Sub InicializaDente15(cor1 As Cor, cor2 As Cor, cor3 As Cor, cor4 As Cor, cor5 As Cor)
        Dente15.Posicao01_Cor = cor1
        Dente15.Posicao02_Cor = cor2
        Dente15.Posicao03_Cor = cor3
        Dente15.Posicao04_Cor = cor4
        Dente15.Posicao05_Cor = cor5
    End Sub
    Public Sub InicializaDente14(cor1 As Cor, cor2 As Cor, cor3 As Cor, cor4 As Cor, cor5 As Cor)
        Dente14.Posicao01_Cor = cor1
        Dente14.Posicao02_Cor = cor2
        Dente14.Posicao03_Cor = cor3
        Dente14.Posicao04_Cor = cor4
        Dente14.Posicao05_Cor = cor5
    End Sub

    Public Sub InicializaDente13(cor1 As Cor, cor2 As Cor, cor3 As Cor, cor4 As Cor, cor5 As Cor)
        Dente13.Posicao01_Cor = cor1
        Dente13.Posicao02_Cor = cor2
        Dente13.Posicao03_Cor = cor3
        Dente13.Posicao04_Cor = cor4
        Dente13.Posicao05_Cor = cor5
    End Sub

    Public Sub InicializaDente12(cor1 As Cor, cor2 As Cor, cor3 As Cor, cor4 As Cor, cor5 As Cor)
        Dente12.Posicao01_Cor = cor1
        Dente12.Posicao02_Cor = cor2
        Dente12.Posicao03_Cor = cor3
        Dente12.Posicao04_Cor = cor4
        Dente12.Posicao05_Cor = cor5
    End Sub
    Public Sub InicializaDente11(cor1 As Cor, cor2 As Cor, cor3 As Cor, cor4 As Cor, cor5 As Cor)
        Dente11.Posicao01_Cor = cor1
        Dente11.Posicao02_Cor = cor2
        Dente11.Posicao03_Cor = cor3
        Dente11.Posicao04_Cor = cor4
        Dente11.Posicao05_Cor = cor5
    End Sub
    Protected Sub Dente18_Cor01(sender As Object, e As EventArgs) Handles Dente18.Cor01
        Dente18.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente18_Cor02(sender As Object, e As EventArgs) Handles Dente18.Cor02
        Dente18.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente18_Cor03(sender As Object, e As EventArgs) Handles Dente18.Cor03
        Dente18.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente18_Cor04(sender As Object, e As EventArgs) Handles Dente18.Cor04
        Dente18.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente18_Cor05(sender As Object, e As EventArgs) Handles Dente18.Cor05
        Dente18.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente17_Cor01(sender As Object, e As EventArgs) Handles Dente17.Cor01
        Dente17.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente17_Cor02(sender As Object, e As EventArgs) Handles Dente17.Cor02
        Dente17.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente17_Cor03(sender As Object, e As EventArgs) Handles Dente17.Cor03
        Dente17.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente17_Cor04(sender As Object, e As EventArgs) Handles Dente17.Cor04
        Dente17.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente17_Cor05(sender As Object, e As EventArgs) Handles Dente17.Cor05
        Dente17.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente16_Cor01(sender As Object, e As EventArgs) Handles Dente16.Cor01
        Dente16.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente16_Cor02(sender As Object, e As EventArgs) Handles Dente16.Cor02
        Dente16.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente16_Cor03(sender As Object, e As EventArgs) Handles Dente16.Cor03
        Dente16.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente16_Cor04(sender As Object, e As EventArgs) Handles Dente16.Cor04
        Dente16.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente16_Cor05(sender As Object, e As EventArgs) Handles Dente16.Cor05
        Dente16.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente15_Cor01(sender As Object, e As EventArgs) Handles Dente15.Cor01
        Dente15.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente15_Cor02(sender As Object, e As EventArgs) Handles Dente15.Cor02
        Dente15.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente15_Cor03(sender As Object, e As EventArgs) Handles Dente15.Cor03
        Dente15.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente15_Cor04(sender As Object, e As EventArgs) Handles Dente15.Cor04
        Dente15.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente15_Cor05(sender As Object, e As EventArgs) Handles Dente15.Cor05
        Dente15.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente14_Cor01(sender As Object, e As EventArgs) Handles Dente14.Cor01
        Dente14.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente14_Cor02(sender As Object, e As EventArgs) Handles Dente14.Cor02
        Dente14.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente14_Cor03(sender As Object, e As EventArgs) Handles Dente14.Cor03
        Dente14.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente14_Cor04(sender As Object, e As EventArgs) Handles Dente14.Cor04
        Dente14.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente14_Cor05(sender As Object, e As EventArgs) Handles Dente14.Cor05
        Dente14.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente13_Cor01(sender As Object, e As EventArgs) Handles Dente13.Cor01
        Dente13.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente13_Cor02(sender As Object, e As EventArgs) Handles Dente13.Cor02
        Dente13.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente13_Cor03(sender As Object, e As EventArgs) Handles Dente13.Cor03
        Dente13.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente13_Cor04(sender As Object, e As EventArgs) Handles Dente13.Cor04
        Dente13.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente13_Cor05(sender As Object, e As EventArgs) Handles Dente13.Cor05
        Dente13.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente12_Cor01(sender As Object, e As EventArgs) Handles Dente12.Cor01
        Dente12.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente12_Cor02(sender As Object, e As EventArgs) Handles Dente12.Cor02
        Dente12.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente12_Cor03(sender As Object, e As EventArgs) Handles Dente12.Cor03
        Dente12.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente12_Cor04(sender As Object, e As EventArgs) Handles Dente12.Cor04
        Dente12.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente12_Cor05(sender As Object, e As EventArgs) Handles Dente12.Cor05
        Dente12.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente11_Cor01(sender As Object, e As EventArgs) Handles Dente11.Cor01
        Dente11.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente11_Cor02(sender As Object, e As EventArgs) Handles Dente11.Cor02
        Dente11.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente11_Cor03(sender As Object, e As EventArgs) Handles Dente11.Cor03
        Dente11.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente11_Cor04(sender As Object, e As EventArgs) Handles Dente11.Cor04
        Dente11.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente11_Cor05(sender As Object, e As EventArgs) Handles Dente11.Cor05
        Dente11.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente21_Cor01(sender As Object, e As EventArgs) Handles Dente21.Cor01
        Dente21.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente21_Cor02(sender As Object, e As EventArgs) Handles Dente21.Cor02
        Dente21.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente21_Cor03(sender As Object, e As EventArgs) Handles Dente21.Cor03
        Dente21.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente21_Cor04(sender As Object, e As EventArgs) Handles Dente21.Cor04
        Dente21.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente21_Cor05(sender As Object, e As EventArgs) Handles Dente21.Cor05
        Dente21.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente22_Cor01(sender As Object, e As EventArgs) Handles Dente22.Cor01
        Dente22.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente22_Cor02(sender As Object, e As EventArgs) Handles Dente22.Cor02
        Dente22.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente22_Cor03(sender As Object, e As EventArgs) Handles Dente22.Cor03
        Dente22.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente22_Cor04(sender As Object, e As EventArgs) Handles Dente22.Cor04
        Dente22.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente22_Cor05(sender As Object, e As EventArgs) Handles Dente22.Cor05
        Dente22.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente23_Cor01(sender As Object, e As EventArgs) Handles Dente23.Cor01
        Dente23.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente23_Cor02(sender As Object, e As EventArgs) Handles Dente23.Cor02
        Dente23.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente23_Cor03(sender As Object, e As EventArgs) Handles Dente23.Cor03
        Dente23.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente23_Cor04(sender As Object, e As EventArgs) Handles Dente23.Cor04
        Dente23.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente23_Cor05(sender As Object, e As EventArgs) Handles Dente23.Cor05
        Dente23.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente24_Cor01(sender As Object, e As EventArgs) Handles Dente24.Cor01
        Dente24.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente24_Cor02(sender As Object, e As EventArgs) Handles Dente24.Cor02
        Dente24.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente24_Cor03(sender As Object, e As EventArgs) Handles Dente24.Cor03
        Dente24.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente24_Cor04(sender As Object, e As EventArgs) Handles Dente24.Cor04
        Dente24.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente24_Cor05(sender As Object, e As EventArgs) Handles Dente24.Cor05
        Dente24.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente25_Cor01(sender As Object, e As EventArgs) Handles Dente25.Cor01
        Dente25.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente25_Cor02(sender As Object, e As EventArgs) Handles Dente25.Cor02
        Dente25.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente25_Cor03(sender As Object, e As EventArgs) Handles Dente25.Cor03
        Dente25.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente25_Cor04(sender As Object, e As EventArgs) Handles Dente25.Cor04
        Dente25.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente25_Cor05(sender As Object, e As EventArgs) Handles Dente25.Cor05
        Dente25.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente26_Cor01(sender As Object, e As EventArgs) Handles Dente26.Cor01
        Dente26.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente26_Cor02(sender As Object, e As EventArgs) Handles Dente26.Cor02
        Dente26.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente26_Cor03(sender As Object, e As EventArgs) Handles Dente26.Cor03
        Dente26.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente26_Cor04(sender As Object, e As EventArgs) Handles Dente26.Cor04
        Dente26.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente26_Cor05(sender As Object, e As EventArgs) Handles Dente26.Cor05
        Dente26.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente27_Cor01(sender As Object, e As EventArgs) Handles Dente27.Cor01
        Dente27.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente27_Cor02(sender As Object, e As EventArgs) Handles Dente27.Cor02
        Dente27.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente27_Cor03(sender As Object, e As EventArgs) Handles Dente27.Cor03
        Dente27.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente27_Cor04(sender As Object, e As EventArgs) Handles Dente27.Cor04
        Dente27.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente27_Cor05(sender As Object, e As EventArgs) Handles Dente27.Cor05
        Dente27.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente28_Cor01(sender As Object, e As EventArgs) Handles Dente28.Cor01
        Dente28.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente28_Cor02(sender As Object, e As EventArgs) Handles Dente28.Cor02
        Dente28.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente28_Cor03(sender As Object, e As EventArgs) Handles Dente28.Cor03
        Dente28.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente28_Cor04(sender As Object, e As EventArgs) Handles Dente28.Cor04
        Dente28.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente28_Cor05(sender As Object, e As EventArgs) Handles Dente28.Cor05
        Dente28.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente48_Cor01(sender As Object, e As EventArgs) Handles Dente48.Cor01
        Dente48.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente48_Cor02(sender As Object, e As EventArgs) Handles Dente48.Cor02
        Dente48.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente48_Cor03(sender As Object, e As EventArgs) Handles Dente48.Cor03
        Dente48.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente48_Cor04(sender As Object, e As EventArgs) Handles Dente48.Cor04
        Dente48.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente48_Cor05(sender As Object, e As EventArgs) Handles Dente48.Cor05
        Dente48.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente47_Cor01(sender As Object, e As EventArgs) Handles Dente47.Cor01
        Dente47.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente47_Cor02(sender As Object, e As EventArgs) Handles Dente47.Cor02
        Dente47.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente47_Cor03(sender As Object, e As EventArgs) Handles Dente47.Cor03
        Dente47.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente47_Cor04(sender As Object, e As EventArgs) Handles Dente47.Cor04
        Dente47.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente47_Cor05(sender As Object, e As EventArgs) Handles Dente47.Cor05
        Dente47.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente46_Cor01(sender As Object, e As EventArgs) Handles Dente46.Cor01
        Dente46.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente46_Cor02(sender As Object, e As EventArgs) Handles Dente46.Cor02
        Dente46.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente46_Cor03(sender As Object, e As EventArgs) Handles Dente46.Cor03
        Dente46.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente46_Cor04(sender As Object, e As EventArgs) Handles Dente46.Cor04
        Dente46.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente46_Cor05(sender As Object, e As EventArgs) Handles Dente46.Cor05
        Dente46.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente45_Cor01(sender As Object, e As EventArgs) Handles Dente45.Cor01
        Dente45.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente45_Cor02(sender As Object, e As EventArgs) Handles Dente45.Cor02
        Dente45.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente45_Cor03(sender As Object, e As EventArgs) Handles Dente45.Cor03
        Dente45.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente45_Cor04(sender As Object, e As EventArgs) Handles Dente45.Cor04
        Dente45.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente45_Cor05(sender As Object, e As EventArgs) Handles Dente45.Cor05
        Dente45.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente44_Cor01(sender As Object, e As EventArgs) Handles Dente44.Cor01
        Dente44.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente44_Cor02(sender As Object, e As EventArgs) Handles Dente44.Cor02
        Dente44.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente44_Cor03(sender As Object, e As EventArgs) Handles Dente44.Cor03
        Dente44.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente44_Cor04(sender As Object, e As EventArgs) Handles Dente44.Cor04
        Dente44.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente44_Cor05(sender As Object, e As EventArgs) Handles Dente44.Cor05
        Dente44.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente43_Cor01(sender As Object, e As EventArgs) Handles Dente43.Cor01
        Dente43.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente43_Cor02(sender As Object, e As EventArgs) Handles Dente43.Cor02
        Dente43.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente43_Cor03(sender As Object, e As EventArgs) Handles Dente43.Cor03
        Dente43.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente43_Cor04(sender As Object, e As EventArgs) Handles Dente43.Cor04
        Dente43.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente43_Cor05(sender As Object, e As EventArgs) Handles Dente43.Cor05
        Dente43.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente42_Cor01(sender As Object, e As EventArgs) Handles Dente42.Cor01
        Dente42.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente42_Cor02(sender As Object, e As EventArgs) Handles Dente42.Cor02
        Dente42.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente42_Cor03(sender As Object, e As EventArgs) Handles Dente42.Cor03
        Dente42.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente42_Cor04(sender As Object, e As EventArgs) Handles Dente42.Cor04
        Dente42.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente42_Cor05(sender As Object, e As EventArgs) Handles Dente42.Cor05
        Dente42.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente41_Cor01(sender As Object, e As EventArgs) Handles Dente41.Cor01
        Dente41.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente41_Cor02(sender As Object, e As EventArgs) Handles Dente41.Cor02
        Dente41.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente41_Cor03(sender As Object, e As EventArgs) Handles Dente41.Cor03
        Dente41.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente41_Cor04(sender As Object, e As EventArgs) Handles Dente41.Cor04
        Dente41.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente41_Cor05(sender As Object, e As EventArgs) Handles Dente41.Cor05
        Dente41.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente31_Cor01(sender As Object, e As EventArgs) Handles Dente31.Cor01
        Dente31.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente31_Cor02(sender As Object, e As EventArgs) Handles Dente31.Cor02
        Dente31.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente31_Cor03(sender As Object, e As EventArgs) Handles Dente31.Cor03
        Dente31.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente31_Cor04(sender As Object, e As EventArgs) Handles Dente31.Cor04
        Dente31.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente31_Cor05(sender As Object, e As EventArgs) Handles Dente31.Cor05
        Dente31.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente32_Cor01(sender As Object, e As EventArgs) Handles Dente32.Cor01
        Dente32.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente32_Cor02(sender As Object, e As EventArgs) Handles Dente32.Cor02
        Dente32.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente32_Cor03(sender As Object, e As EventArgs) Handles Dente32.Cor03
        Dente32.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente32_Cor04(sender As Object, e As EventArgs) Handles Dente32.Cor04
        Dente32.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente32_Cor05(sender As Object, e As EventArgs) Handles Dente32.Cor05
        Dente32.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente33_Cor01(sender As Object, e As EventArgs) Handles Dente33.Cor01
        Dente33.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente33_Cor02(sender As Object, e As EventArgs) Handles Dente33.Cor02
        Dente33.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente33_Cor03(sender As Object, e As EventArgs) Handles Dente33.Cor03
        Dente33.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente33_Cor04(sender As Object, e As EventArgs) Handles Dente33.Cor04
        Dente33.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente33_Cor05(sender As Object, e As EventArgs) Handles Dente33.Cor05
        Dente33.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente34_Cor01(sender As Object, e As EventArgs) Handles Dente34.Cor01
        Dente34.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente34_Cor02(sender As Object, e As EventArgs) Handles Dente34.Cor02
        Dente34.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente34_Cor03(sender As Object, e As EventArgs) Handles Dente34.Cor03
        Dente34.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente34_Cor04(sender As Object, e As EventArgs) Handles Dente34.Cor04
        Dente34.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente34_Cor05(sender As Object, e As EventArgs) Handles Dente34.Cor05
        Dente34.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente35_Cor01(sender As Object, e As EventArgs) Handles Dente35.Cor01
        Dente35.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente35_Cor02(sender As Object, e As EventArgs) Handles Dente35.Cor02
        Dente35.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente35_Cor03(sender As Object, e As EventArgs) Handles Dente35.Cor03
        Dente35.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente35_Cor04(sender As Object, e As EventArgs) Handles Dente35.Cor04
        Dente35.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente35_Cor05(sender As Object, e As EventArgs) Handles Dente35.Cor05
        Dente35.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente36_Cor01(sender As Object, e As EventArgs) Handles Dente36.Cor01
        Dente36.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente36_Cor02(sender As Object, e As EventArgs) Handles Dente36.Cor02
        Dente36.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente36_Cor03(sender As Object, e As EventArgs) Handles Dente36.Cor03
        Dente36.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente36_Cor04(sender As Object, e As EventArgs) Handles Dente36.Cor04
        Dente36.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente36_Cor05(sender As Object, e As EventArgs) Handles Dente36.Cor05
        Dente36.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente37_Cor01(sender As Object, e As EventArgs) Handles Dente37.Cor01
        Dente37.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente37_Cor02(sender As Object, e As EventArgs) Handles Dente37.Cor02
        Dente37.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente37_Cor03(sender As Object, e As EventArgs) Handles Dente37.Cor03
        Dente37.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente37_Cor04(sender As Object, e As EventArgs) Handles Dente37.Cor04
        Dente37.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente37_Cor05(sender As Object, e As EventArgs) Handles Dente37.Cor05
        Dente37.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente38_Cor01(sender As Object, e As EventArgs) Handles Dente38.Cor01
        Dente38.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente38_Cor02(sender As Object, e As EventArgs) Handles Dente38.Cor02
        Dente38.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente38_Cor03(sender As Object, e As EventArgs) Handles Dente38.Cor03
        Dente38.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente38_Cor04(sender As Object, e As EventArgs) Handles Dente38.Cor04
        Dente38.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente38_Cor05(sender As Object, e As EventArgs) Handles Dente38.Cor05
        Dente38.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente55_Cor01(sender As Object, e As EventArgs) Handles Dente55.Cor01
        Dente55.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente55_Cor02(sender As Object, e As EventArgs) Handles Dente55.Cor02
        Dente55.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente55_Cor03(sender As Object, e As EventArgs) Handles Dente55.Cor03
        Dente55.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente55_Cor04(sender As Object, e As EventArgs) Handles Dente55.Cor04
        Dente55.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente55_Cor05(sender As Object, e As EventArgs) Handles Dente55.Cor05
        Dente55.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente54_Cor01(sender As Object, e As EventArgs) Handles Dente54.Cor01
        Dente54.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente54_Cor02(sender As Object, e As EventArgs) Handles Dente54.Cor02
        Dente54.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente54_Cor03(sender As Object, e As EventArgs) Handles Dente54.Cor03
        Dente54.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente54_Cor04(sender As Object, e As EventArgs) Handles Dente54.Cor04
        Dente54.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente54_Cor05(sender As Object, e As EventArgs) Handles Dente54.Cor05
        Dente54.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente53_Cor01(sender As Object, e As EventArgs) Handles Dente53.Cor01
        Dente53.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente53_Cor02(sender As Object, e As EventArgs) Handles Dente53.Cor02
        Dente53.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente53_Cor03(sender As Object, e As EventArgs) Handles Dente53.Cor03
        Dente53.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente53_Cor04(sender As Object, e As EventArgs) Handles Dente53.Cor04
        Dente53.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente53_Cor05(sender As Object, e As EventArgs) Handles Dente53.Cor05
        Dente53.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente52_Cor01(sender As Object, e As EventArgs) Handles Dente52.Cor01
        Dente52.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente52_Cor02(sender As Object, e As EventArgs) Handles Dente52.Cor02
        Dente52.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente52_Cor03(sender As Object, e As EventArgs) Handles Dente52.Cor03
        Dente52.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente52_Cor04(sender As Object, e As EventArgs) Handles Dente52.Cor04
        Dente52.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente52_Cor05(sender As Object, e As EventArgs) Handles Dente52.Cor05
        Dente52.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente51_Cor01(sender As Object, e As EventArgs) Handles Dente51.Cor01
        Dente51.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente51_Cor02(sender As Object, e As EventArgs) Handles Dente51.Cor02
        Dente51.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente51_Cor03(sender As Object, e As EventArgs) Handles Dente51.Cor03
        Dente51.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente51_Cor04(sender As Object, e As EventArgs) Handles Dente51.Cor04
        Dente51.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente51_Cor05(sender As Object, e As EventArgs) Handles Dente51.Cor05
        Dente51.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente61_Cor01(sender As Object, e As EventArgs) Handles Dente61.Cor01
        Dente61.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente61_Cor02(sender As Object, e As EventArgs) Handles Dente61.Cor02
        Dente61.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente61_Cor03(sender As Object, e As EventArgs) Handles Dente61.Cor03
        Dente61.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente61_Cor04(sender As Object, e As EventArgs) Handles Dente61.Cor04
        Dente61.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente61_Cor05(sender As Object, e As EventArgs) Handles Dente61.Cor05
        Dente61.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente62_Cor01(sender As Object, e As EventArgs) Handles Dente62.Cor01
        Dente62.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente62_Cor02(sender As Object, e As EventArgs) Handles Dente62.Cor02
        Dente62.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente62_Cor03(sender As Object, e As EventArgs) Handles Dente62.Cor03
        Dente62.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente62_Cor04(sender As Object, e As EventArgs) Handles Dente62.Cor04
        Dente62.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente62_Cor05(sender As Object, e As EventArgs) Handles Dente62.Cor05
        Dente62.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente63_Cor01(sender As Object, e As EventArgs) Handles Dente63.Cor01
        Dente63.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente63_Cor02(sender As Object, e As EventArgs) Handles Dente63.Cor02
        Dente63.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente63_Cor03(sender As Object, e As EventArgs) Handles Dente63.Cor03
        Dente63.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente63_Cor04(sender As Object, e As EventArgs) Handles Dente63.Cor04
        Dente63.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente63_Cor05(sender As Object, e As EventArgs) Handles Dente63.Cor05
        Dente63.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente64_Cor01(sender As Object, e As EventArgs) Handles Dente64.Cor01
        Dente64.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente64_Cor02(sender As Object, e As EventArgs) Handles Dente64.Cor02
        Dente64.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente64_Cor03(sender As Object, e As EventArgs) Handles Dente64.Cor03
        Dente64.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente64_Cor04(sender As Object, e As EventArgs) Handles Dente64.Cor04
        Dente64.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente64_Cor05(sender As Object, e As EventArgs) Handles Dente64.Cor05
        Dente64.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente65_Cor01(sender As Object, e As EventArgs) Handles Dente65.Cor01
        Dente65.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente65_Cor02(sender As Object, e As EventArgs) Handles Dente65.Cor02
        Dente65.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente65_Cor03(sender As Object, e As EventArgs) Handles Dente65.Cor03
        Dente65.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente65_Cor04(sender As Object, e As EventArgs) Handles Dente65.Cor04
        Dente65.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente65_Cor05(sender As Object, e As EventArgs) Handles Dente65.Cor05
        Dente65.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente85_Cor01(sender As Object, e As EventArgs) Handles Dente85.Cor01
        Dente85.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente85_Cor02(sender As Object, e As EventArgs) Handles Dente85.Cor02
        Dente85.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente85_Cor03(sender As Object, e As EventArgs) Handles Dente85.Cor03
        Dente85.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente85_Cor04(sender As Object, e As EventArgs) Handles Dente85.Cor04
        Dente85.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente85_Cor05(sender As Object, e As EventArgs) Handles Dente85.Cor05
        Dente85.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente84_Cor01(sender As Object, e As EventArgs) Handles Dente84.Cor01
        Dente84.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente84_Cor02(sender As Object, e As EventArgs) Handles Dente84.Cor02
        Dente84.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente84_Cor03(sender As Object, e As EventArgs) Handles Dente84.Cor03
        Dente84.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente84_Cor04(sender As Object, e As EventArgs) Handles Dente84.Cor04
        Dente84.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente84_Cor05(sender As Object, e As EventArgs) Handles Dente84.Cor05
        Dente84.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente83_Cor01(sender As Object, e As EventArgs) Handles Dente83.Cor01
        Dente83.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente83_Cor02(sender As Object, e As EventArgs) Handles Dente83.Cor02
        Dente83.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente83_Cor03(sender As Object, e As EventArgs) Handles Dente83.Cor03
        Dente83.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente83_Cor04(sender As Object, e As EventArgs) Handles Dente83.Cor04
        Dente83.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente83_Cor05(sender As Object, e As EventArgs) Handles Dente83.Cor05
        Dente83.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente82_Cor01(sender As Object, e As EventArgs) Handles Dente82.Cor01
        Dente82.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente82_Cor02(sender As Object, e As EventArgs) Handles Dente82.Cor02
        Dente82.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente82_Cor03(sender As Object, e As EventArgs) Handles Dente82.Cor03
        Dente82.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente82_Cor04(sender As Object, e As EventArgs) Handles Dente82.Cor04
        Dente82.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente82_Cor05(sender As Object, e As EventArgs) Handles Dente82.Cor05
        Dente82.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente81_Cor01(sender As Object, e As EventArgs) Handles Dente81.Cor01
        Dente81.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente81_Cor02(sender As Object, e As EventArgs) Handles Dente81.Cor02
        Dente81.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente81_Cor03(sender As Object, e As EventArgs) Handles Dente81.Cor03
        Dente81.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente81_Cor04(sender As Object, e As EventArgs) Handles Dente81.Cor04
        Dente81.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente81_Cor05(sender As Object, e As EventArgs) Handles Dente81.Cor05
        Dente81.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente71_Cor01(sender As Object, e As EventArgs) Handles Dente71.Cor01
        Dente71.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente71_Cor02(sender As Object, e As EventArgs) Handles Dente71.Cor02
        Dente71.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente71_Cor03(sender As Object, e As EventArgs) Handles Dente71.Cor03
        Dente71.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente71_Cor04(sender As Object, e As EventArgs) Handles Dente71.Cor04
        Dente71.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente71_Cor05(sender As Object, e As EventArgs) Handles Dente71.Cor05
        Dente71.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente72_Cor01(sender As Object, e As EventArgs) Handles Dente72.Cor01
        Dente72.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente72_Cor02(sender As Object, e As EventArgs) Handles Dente72.Cor02
        Dente72.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente72_Cor03(sender As Object, e As EventArgs) Handles Dente72.Cor03
        Dente72.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente72_Cor04(sender As Object, e As EventArgs) Handles Dente72.Cor04
        Dente72.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente72_Cor05(sender As Object, e As EventArgs) Handles Dente72.Cor05
        Dente72.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente73_Cor01(sender As Object, e As EventArgs) Handles Dente73.Cor01
        Dente73.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente73_Cor02(sender As Object, e As EventArgs) Handles Dente73.Cor02
        Dente73.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente73_Cor03(sender As Object, e As EventArgs) Handles Dente73.Cor03
        Dente73.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente73_Cor04(sender As Object, e As EventArgs) Handles Dente73.Cor04
        Dente73.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente73_Cor05(sender As Object, e As EventArgs) Handles Dente73.Cor05
        Dente73.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente74_Cor01(sender As Object, e As EventArgs) Handles Dente74.Cor01
        Dente74.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente74_Cor02(sender As Object, e As EventArgs) Handles Dente74.Cor02
        Dente74.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente74_Cor03(sender As Object, e As EventArgs) Handles Dente74.Cor03
        Dente74.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente74_Cor04(sender As Object, e As EventArgs) Handles Dente74.Cor04
        Dente74.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente74_Cor05(sender As Object, e As EventArgs) Handles Dente74.Cor05
        Dente74.Posicao05_Cor = CorEscolhida
    End Sub
    Protected Sub Dente75_Cor01(sender As Object, e As EventArgs) Handles Dente75.Cor01
        Dente75.Posicao01_Cor = CorEscolhida
    End Sub
    Protected Sub Dente75_Cor02(sender As Object, e As EventArgs) Handles Dente75.Cor02
        Dente75.Posicao02_Cor = CorEscolhida
    End Sub
    Protected Sub Dente75_Cor03(sender As Object, e As EventArgs) Handles Dente75.Cor03
        Dente75.Posicao03_Cor = CorEscolhida
    End Sub
    Protected Sub Dente75_Cor04(sender As Object, e As EventArgs) Handles Dente75.Cor04
        Dente75.Posicao04_Cor = CorEscolhida
    End Sub
    Protected Sub Dente75_Cor05(sender As Object, e As EventArgs) Handles Dente75.Cor05
        Dente75.Posicao05_Cor = CorEscolhida
    End Sub

    Protected Sub Dente18_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente18.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "18"
    End Sub
    Protected Sub Dente17_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente17.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "17"
    End Sub
    Protected Sub Dente16_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente16.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "16"
    End Sub
    Protected Sub Dente15_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente15.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "15"
    End Sub
    Protected Sub Dente14_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente14.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "14"
    End Sub
    Protected Sub Dente13_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente13.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "13"
    End Sub
    Protected Sub Dente12_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente12.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "12"
    End Sub
    Protected Sub Dente11_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente11.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "11"
    End Sub
    Protected Sub Dente21_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente21.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "21"
    End Sub
    Protected Sub Dente22_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente22.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "22"
    End Sub
    Protected Sub Dente23_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente23.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "23"
    End Sub
    Protected Sub Dente24_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente24.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "24"
    End Sub
    Protected Sub Dente25_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente25.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "25"
    End Sub
    Protected Sub Dente26_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente26.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "26"
    End Sub
    Protected Sub Dente27_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente27.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "27"
    End Sub
    Protected Sub Dente28_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente28.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "28"
    End Sub
    Protected Sub Dente48_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente48.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "48"
    End Sub
    Protected Sub Dente47_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente47.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "47"
    End Sub
    Protected Sub Dente46_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente46.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "46"
    End Sub
    Protected Sub Dente45_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente45.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "45"
    End Sub
    Protected Sub Dente44_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente44.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "44"
    End Sub
    Protected Sub Dente43_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente43.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "43"
    End Sub
    Protected Sub Dente42_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente42.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "42"
    End Sub
    Protected Sub Dente41_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente41.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "41"
    End Sub
    Protected Sub Dente31_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente31.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "31"
    End Sub
    Protected Sub Dente32_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente32.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "32"
    End Sub
    Protected Sub Dente33_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente33.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "33"
    End Sub
    Protected Sub Dente34_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente34.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "34"
    End Sub
    Protected Sub Dente35_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente35.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "35"
    End Sub
    Protected Sub Dente36_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente36.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "36"
    End Sub
    Protected Sub Dente37_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente37.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "37"
    End Sub
    Protected Sub Dente38_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente38.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "38"
    End Sub
    Protected Sub Dente55_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente55.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "55"
    End Sub
    Protected Sub Dente54_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente54.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "54"
    End Sub
    Protected Sub Dente53_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente53.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "53"
    End Sub
    Protected Sub Dente52_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente52.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "52"
    End Sub
    Protected Sub Dente51_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente51.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "51"
    End Sub
    Protected Sub Dente61_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente61.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "61"
    End Sub
    Protected Sub Dente62_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente62.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "62"
    End Sub
    Protected Sub Dente63_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente63.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "63"
    End Sub
    Protected Sub Dente64_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente64.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "64"
    End Sub
    Protected Sub Dente65_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente65.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "65"
    End Sub
    Protected Sub Dente85_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente85.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "85"
    End Sub
    Protected Sub Dente84_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente84.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "84"
    End Sub
    Protected Sub Dente83_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente83.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "83"
    End Sub
    Protected Sub Dente82_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente82.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "82"
    End Sub
    Protected Sub Dente81_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente81.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "81"
    End Sub
    Protected Sub Dente71_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente71.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "71"
    End Sub
    Protected Sub Dente72_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente72.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "72"
    End Sub
    Protected Sub Dente73_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente73.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "73"
    End Sub
    Protected Sub Dente74_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente74.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "74"
    End Sub

    Protected Sub Dente75_SelecionaNumero(sender As Object, e As EventArgs) Handles Dente75.SelecionaNumero
        BtnExtracao.Visible = True
        hnddente.Value = "75"
    End Sub

    


    Protected Sub Page_Load(sender As Object, e As EventArgs) Handles Me.Load
        If Not IsPostBack Then
         
        End If
    End Sub

    Protected Sub BtnExtracao_Click(sender As Object, e As EventArgs) Handles BtnExtracao.Click
        If hnddente.Value IsNot Nothing Then
            If hnddente.Value.ToString <> "" Then
                DirectCast(Me.FindControl("Dente" + hnddente.Value.ToString), Dente).DenteExtraido = True
            End If
        End If
    End Sub
End Class
